function [finalnames,finalvars]=UpdatePlots(fid);
%This function retracts the variables that are changing from a Cicero run

varinfo=h5info(fid,'/VariableValues/');
datasets=varinfo.Datasets;
nsets=length(datasets);
finalnames={};
finalvars=[];

for i=1:nsets
    inivec=datasets(i).Name;
    target=strcat('/VariableValues/',inivec);
    targetvar=h5read(fid,char(target));
    if isa(targetvar,'double')==1
        finalnames=[finalnames,inivec];
        variab=h5read(fid,char(target));
        finalvars=[finalvars,variab];
    end
end
finalnames;
finalvars;